home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 January / PCWorld_2007-01_cd.bin / v cisle / autoit / autoit-v3.2.0.1-setup.exe / Examples / Helpfile / _GUICtrlTreeViewGetParentHandle.au3 < prev    next >
Encoding:
Text File  |  2006-08-04  |  1.0 KB  |  36 lines
  1. #include <GuiTreeView.au3>
  2. #include <GuiStatusBar.au3>
  3.  
  4. opt ("MustDeclareVars", 1)
  5.  
  6. Dim $tree, $item1, $subitem1, $subitem2, $item2, $subitem3, $subitem4, $button, $msg, $Status, $gui
  7.  
  8. $gui = GUICreate("Test", 392, 254)
  9. $tree = GUICtrlCreateTreeView(10, 10, 200, 200)
  10.  
  11. $item1 = GUICtrlCreateTreeViewItem("Mainitem1", $tree)
  12. $subitem1 = GUICtrlCreateTreeViewItem("Subitem11", $item1)
  13. $subitem2 = GUICtrlCreateTreeViewItem("Subitem12", $item1)
  14. $item2 = GUICtrlCreateTreeViewItem("Mainitem2", $tree)
  15. $subitem3 = GUICtrlCreateTreeViewItem("Subitem21", $item2)
  16. $subitem4 = GUICtrlCreateTreeViewItem("Subitem22", $item2)
  17.  
  18. $button = GUICtrlCreateButton("Check", 220, 100, 70, 20)
  19. $Status = _GuiCtrlStatusBarCreate($gui, -1, "")
  20. _GuiCtrlStatusBarSetSimple($Status)
  21.  
  22. GUISetState()
  23.  
  24. While 1
  25.     $msg = GUIGetMsg()
  26.     Select
  27.         Case $msg = $GUI_EVENT_CLOSE
  28.             ExitLoop
  29.         Case $msg = $button
  30.             _GuiCtrlStatusBarSetText($Status, "Parent Handle: " & _GUICtrlTreeViewGetParentHandle ($tree),255)
  31.     EndSelect
  32. WEnd
  33.  
  34. Exit
  35.  
  36.